﻿Module Module1
  Sub Main()

    ' Esempio: 08.08
    Dim ruote() As Integer = _
        {15, 81, 77, 44, 12, 45, 24, _
         34, 76, 44, 1, 5, 7, 2, 5}
    Array.Sort(ruote)
    For i As Integer = 0 To 14
      Console.WriteLine(ruote(i))
    Next
    Console.ReadLine()

  End Sub
End Module
